object FrmMain: TFrmMain
  Left = 0
  Top = 0
  Caption = 'FrmMain'
  ClientHeight = 424
  ClientWidth = 690
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  object pgc1: TPageControl
    Left = 0
    Top = 0
    Width = 690
    Height = 424
    ActivePage = ts1
    Align = alClient
    TabOrder = 0
    OnChange = pgc1Change
    object ts1: TTabSheet
      Caption = 'DemoTest'
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object pnl1: TPanel
        Left = 0
        Top = 0
        Width = 682
        Height = 57
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        object btnEchoString: TButton
          Left = 40
          Top = 16
          Width = 75
          Height = 25
          Caption = 'EchoString'
          TabOrder = 0
          OnClick = btnEchoStringClick
        end
        object btnQueryData: TButton
          Left = 136
          Top = 16
          Width = 75
          Height = 25
          Caption = 'QueryData'
          TabOrder = 1
          OnClick = btnQueryDataClick
        end
        object btn1: TButton
          Left = 240
          Top = 16
          Width = 75
          Height = 25
          Caption = 'ExecuteSQL'
          TabOrder = 2
          OnClick = btn1Click
        end
        object btn2: TButton
          Left = 321
          Top = 16
          Width = 75
          Height = 25
          Caption = 'ApplyUpdates'
          TabOrder = 3
          OnClick = btn2Click
        end
        object btn10: TButton
          Left = 456
          Top = 16
          Width = 75
          Height = 25
          Caption = #35282#33394#31649#29702
          TabOrder = 4
          OnClick = btn10Click
        end
      end
      object dbgrd1: TDBGrid
        Left = 0
        Top = 57
        Width = 682
        Height = 339
        Align = alClient
        DataSource = ds1
        TabOrder = 1
        TitleFont.Charset = ANSI_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = #23435#20307
        TitleFont.Style = []
      end
    end
    object ts2: TTabSheet
      Caption = 'TreeList'
      ImageIndex = 1
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object pnl2: TPanel
        Left = 0
        Top = 35
        Width = 682
        Height = 153
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          682
          153)
        object lbl1: TLabel
          Left = 32
          Top = 40
          Width = 60
          Height = 12
          Caption = #23458#25143#32534#30721#65306
        end
        object lbl2: TLabel
          Left = 32
          Top = 69
          Width = 60
          Height = 12
          Caption = #23458#25143#21517#31216#65306
        end
        object lbl3: TLabel
          Left = 32
          Top = 103
          Width = 60
          Height = 12
          Caption = #25551'    '#36848#65306
        end
        object lbl4: TLabel
          Left = 245
          Top = 40
          Width = 84
          Height = 12
          Caption = #19978#32423#33410#28857#32534#30721#65306
        end
        object lbl5: TLabel
          Left = 462
          Top = 69
          Width = 60
          Height = 12
          Caption = #31867#22411#32534#30721#65306
        end
        object lbl6: TLabel
          Left = 244
          Top = 69
          Width = 84
          Height = 12
          Caption = #26159#21542#26411#32423#33410#28857#65306
        end
        object lbl7: TLabel
          Left = 462
          Top = 40
          Width = 60
          Height = 12
          Caption = #23618'    '#32423#65306
        end
        object dbnvgr1: TDBNavigator
          Left = 0
          Top = 0
          Width = 682
          Height = 25
          DataSource = ds2
          Align = alTop
          TabOrder = 0
        end
        object dbedt1: TDBEdit
          Left = 88
          Top = 36
          Width = 140
          Height = 20
          DataField = 'Class_ID'
          DataSource = ds2
          TabOrder = 1
        end
        object dbedt2: TDBEdit
          Left = 88
          Top = 65
          Width = 140
          Height = 20
          DataField = 'Class_Name'
          DataSource = ds2
          TabOrder = 2
        end
        object dbedt4: TDBEdit
          Left = 332
          Top = 36
          Width = 121
          Height = 20
          DataField = 'Class_Upper'
          DataSource = ds2
          ReadOnly = True
          TabOrder = 3
        end
        object dbedt5: TDBEdit
          Left = 519
          Top = 36
          Width = 121
          Height = 20
          Anchors = [akLeft, akTop, akRight]
          DataField = 'Class_Level'
          DataSource = ds2
          ReadOnly = True
          TabOrder = 4
        end
        object dbedt6: TDBEdit
          Left = 519
          Top = 65
          Width = 121
          Height = 20
          Anchors = [akLeft, akTop, akRight]
          DataField = 'Class_Code'
          DataSource = ds2
          ReadOnly = True
          TabOrder = 5
        end
        object dbmmo1: TDBMemo
          Left = 88
          Top = 95
          Width = 552
          Height = 42
          Anchors = [akLeft, akTop, akRight]
          DataField = 'Memo'
          DataSource = ds2
          TabOrder = 6
        end
        object dbchk1: TDBCheckBox
          Left = 332
          Top = 66
          Width = 97
          Height = 17
          Caption = 'dbchk1'
          DataField = 'Class_Over'
          DataSource = ds2
          TabOrder = 7
          ValueChecked = '0'
          ValueUnchecked = '1'
        end
        object btn3: TButton
          Left = 16
          Top = 120
          Width = 75
          Height = 25
          Caption = 'btn3'
          TabOrder = 8
          OnClick = btn3Click
        end
      end
      object lst1: TcxDBTreeList
        Left = 0
        Top = 188
        Width = 682
        Height = 208
        Align = alClient
        Bands = <
          item
          end>
        DataController.DataSource = ds2
        DataController.ParentField = 'Class_Upper'
        DataController.KeyField = 'Class_ID'
        LookAndFeel.SkinName = ''
        OptionsView.GridLines = tlglBoth
        RootValue = -1
        TabOrder = 1
        object clnlst1Class_ID: TcxDBTreeListColumn
          Caption.AlignHorz = taCenter
          Caption.AlignVert = vaCenter
          Caption.Text = #23458#25143#32534#30721
          DataBinding.FieldName = 'Class_ID'
          Width = 123
          Position.ColIndex = 0
          Position.RowIndex = 0
          Position.BandIndex = 0
          Summary.FooterSummaryItems = <>
          Summary.GroupFooterSummaryItems = <>
        end
        object clnlst1Class_Name: TcxDBTreeListColumn
          Caption.AlignHorz = taCenter
          Caption.AlignVert = vaCenter
          Caption.Text = #23458#25143#21517#31216
          DataBinding.FieldName = 'Class_Name'
          Width = 154
          Position.ColIndex = 1
          Position.RowIndex = 0
          Position.BandIndex = 0
          Summary.FooterSummaryItems = <>
          Summary.GroupFooterSummaryItems = <>
        end
        object clnlst1Memo: TcxDBTreeListColumn
          Caption.AlignHorz = taCenter
          Caption.AlignVert = vaCenter
          Caption.Text = #22791#27880
          DataBinding.FieldName = 'Memo'
          Width = 233
          Position.ColIndex = 2
          Position.RowIndex = 0
          Position.BandIndex = 0
          Summary.FooterSummaryItems = <>
          Summary.GroupFooterSummaryItems = <>
        end
        object clnlst1Class_Over: TcxDBTreeListColumn
          PropertiesClassName = 'TcxCheckBoxProperties'
          Properties.Alignment = taCenter
          Properties.NullStyle = nssUnchecked
          Properties.ValueChecked = 0
          Properties.ValueUnchecked = 1
          Caption.AlignHorz = taCenter
          Caption.AlignVert = vaCenter
          Caption.Text = #26159#21542#26411#32423
          DataBinding.FieldName = 'Class_Over'
          Width = 100
          Position.ColIndex = 3
          Position.RowIndex = 0
          Position.BandIndex = 0
          Summary.FooterSummaryItems = <>
          Summary.GroupFooterSummaryItems = <>
        end
      end
      object tlb1: TToolBar
        Left = 0
        Top = 0
        Width = 682
        Height = 35
        AutoSize = True
        ButtonHeight = 35
        ButtonWidth = 67
        Caption = 'tlb1'
        Images = il1
        ShowCaptions = True
        TabOrder = 2
        object btn4: TToolButton
          Left = 0
          Top = 0
          Caption = #22686#21152#33410#28857
          ImageIndex = 0
          OnClick = btn4Click
        end
        object btn5: TToolButton
          Left = 67
          Top = 0
          Caption = #22686#21152#23376#33410#28857
          ImageIndex = 1
          OnClick = btn5Click
        end
        object btn6: TToolButton
          Left = 134
          Top = 0
          Caption = #20462#25913
          ImageIndex = 2
        end
        object btn7: TToolButton
          Left = 201
          Top = 0
          Caption = #21024#38500
          ImageIndex = 3
        end
        object btn8: TToolButton
          Left = 268
          Top = 0
          Caption = #20445#23384
          ImageIndex = 4
        end
        object btn9: TToolButton
          Left = 335
          Top = 0
          Caption = #21462#28040
          ImageIndex = 5
        end
      end
    end
    object ts3: TTabSheet
      Caption = 'ts3'
      ImageIndex = 2
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object btn11: TButton
        Left = 192
        Top = 24
        Width = 75
        Height = 25
        Caption = 'Size'
        TabOrder = 0
        OnClick = btn11Click
      end
      object mmo1: TMemo
        Left = 48
        Top = 72
        Width = 601
        Height = 281
        Lines.Strings = (
          'mmo1')
        TabOrder = 1
      end
    end
    object ts4: TTabSheet
      Caption = 'S_DEPT'
      ImageIndex = 3
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object tvDept: TdxDBTreeView
        Left = 0
        Top = 0
        Width = 682
        Height = 396
        ShowNodeHint = True
        DataSource = dsDept
        KeyField = 'Guid'
        ListField = 'DisplayName'
        ParentField = 'ParentGuid'
        RootValue = '-1'
        SeparatedSt = ' - '
        RaiseOnError = True
        HideSelection = False
        Indent = 19
        Align = alClient
        ParentColor = False
        Options = [trDBCanDelete, trDBConfirmDelete, trCanDBNavigate, trSmartRecordCopy, trCheckHasChildren]
        SelectedIndex = -1
        TabOrder = 0
      end
    end
  end
  object ConMain: TSQLConnection
    ConnectionName = 'DataSnapCONNECTION'
    DriverName = 'DataSnap'
    LoginPrompt = False
    Params.Strings = (
      'DriverName=DataSnap'
      'HostName=localhost'
      'port=211')
    Left = 168
    Top = 304
  end
  object ds1: TDataSource
    DataSet = cds1
    Left = 88
    Top = 312
  end
  object cds1: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 256
    Top = 296
  end
  object cds2: TClientDataSet
    Aggregates = <>
    Params = <>
    BeforePost = cds2BeforePost
    Left = 112
    Top = 232
  end
  object ds2: TDataSource
    DataSet = cds2
    Left = 168
    Top = 232
  end
  object il1: TImageList
    Left = 112
    Top = 136
  end
  object dsDept: TDataSource
    DataSet = cdsDept
    Left = 432
    Top = 224
  end
  object cdsDept: TClientDataSet
    Aggregates = <>
    Params = <>
    BeforePost = cds2BeforePost
    Left = 384
    Top = 176
  end
end
